home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 22 / AACD 22.iso / AACD / Programming / powerd / modules.lha / modules / graphics / gels.m < prev    next >
Encoding:
Text File  |  1999-04-05  |  1.7 KB  |  107 lines
  1. CONST    SUSERFLAGS=$FF,
  2.         VSF_VSPRITE=1,
  3.         VSF_SAVEBACK=2,
  4.         VSF_OVERLAY=4,
  5.         VSF_MUSTDRAW=8,
  6.         VSF_BACKSAVED=$100,
  7.         VSF_BOBUPDATE=$200,
  8.         VSF_GELGONE=$400,
  9.         VSF_VSOVERFLOW=$800,
  10.         BUSERFLAGS=$FF,
  11.         BF_SAVEBOB=1,
  12.         BF_BOBISCOMP=2,
  13.         BF_BWAITING=$100,
  14.         BF_BDRAWN=$200,
  15.         BF_BOBSAWAY=$400,
  16.         BF_BOBNIX=$800,
  17.         BF_SAVEPRESERVE=$1000,
  18.         BF_OUTSTEP=$2000,
  19.         ANFRACSIZE=6,
  20.         ANIMHALF=$20,
  21.         RINGTRIGGER=1
  22.  
  23. OBJECT VS
  24.     NextVSprite:PTR TO VS,
  25.     PrevVSprite:PTR TO VS,
  26.     DrawPath:PTR TO VS,
  27.     ClearPath:PTR TO VS,
  28.     OldY:INT,
  29.     OldX:INT,
  30.     VSFlags:INT,
  31.     Y:INT,
  32.     X:INT,
  33.     Height:INT,
  34.     Width:INT,
  35.     Depth:INT,
  36.     MeMask:INT,
  37.     HitMask:INT,
  38.     ImageData:PTR TO INT,
  39.     BorderLine:PTR TO INT,
  40.     CollMask:PTR TO INT,
  41.     SprColors:PTR TO INT,
  42.     VSBob:PTR TO Bob,
  43.     PlanePick:UBYTE,
  44.     PlaneOnOff:UBYTE,
  45.     VUserExt:LONG
  46.  
  47. OBJECT Bob
  48.     BobFlags:INT,
  49.     SaveBuffer:PTR TO INT,
  50.     ImageShadow:PTR TO INT,
  51.     Before:PTR TO Bob,
  52.     After:PTR TO Bob,
  53.     BobVSprite:PTR TO VS,
  54.     BobComp:PTR TO AC,
  55.     DBuffer:PTR TO DBP,
  56.     BUserExt:LONG
  57.  
  58. OBJECT AC
  59.     CompFlags:INT,
  60.     Timer:INT,
  61.     TimeSet:INT,
  62.     NextComp:PTR TO AC,
  63.     PrevComp:PTR TO AC,
  64.     NextSeq:PTR TO AC,
  65.     PrevSeq:PTR TO AC,
  66.     AnimCRoutine:LONG,
  67.     YTrans:INT,
  68.     XTrans:INT,
  69.     HeadOb:PTR TO AO,
  70.     AnimBob:PTR TO Bob
  71.  
  72. OBJECT AO
  73.     NextOb:PTR TO AO,
  74.     PrevOb:PTR TO AO,
  75.     Clock:LONG,
  76.     AnoldY:INT,
  77.     AnoldX:INT,
  78.     AnY:INT,
  79.     AnX:INT,
  80.     YVel:INT,
  81.     XVel:INT,
  82.     YAccel:INT,
  83.     XAccel:INT,
  84.     RingYTrans:INT,
  85.     RingXTrans:INT,
  86.     AnimORoutine:LONG,
  87.     HeadComp:PTR TO AC,
  88.     AUserExt:LONG
  89.  
  90. OBJECT DBP
  91.     BufY:INT,
  92.     BufX:INT,
  93.     BufPath:PTR TO VS,
  94.     BufBuffer:PTR TO INT,
  95.     BufPlanes:PTR TO LONG
  96. /*
  97. #define InitAnimate(animKey) PutLong(animKey,NIL)
  98. #define RemBob(b)            PutInt(b, Int(b) OR BF_BOBSAWAY)
  99. */
  100. CONST    B2NORM=0,
  101.         B2SWAP=1,
  102.         B2BOBBER=2
  103.  
  104. // Um, this was in 'graphics/view'
  105. OBJECT CollTable
  106.     CollPtrs[16]:LONG
  107.